home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / physe / physupdt.tex < prev   
Text File  |  1992-08-26  |  3KB  |  110 lines
  1. %***  this is file PHYSUPDT as of 1988.04.06  ***
  2. %***  modifications and updates to PHYS-TeX version 1.0  ***
  3. %
  4. %***  make sure this file is read once and only once !!
  5. %
  6. \ifx\resetpar\undefined
  7.   \wlog{* don't read the file physupdt twice !! *}%
  8.   \expandafter\endinput\fi
  9. \resetpar  % restore definition of \par
  10.  
  11. \def\fmtupdt{1.3.0}  % identifies the current update version
  12.  
  13. \wlog{* modifications and updates as of 1988.04.11 *}
  14.  
  15. \ifx\userid\undefined \def\userid{YOUR~USERID}\fi
  16.  
  17. \def\wlog#1{} % suppress allocation messages
  18. \catcode`\@=11
  19.  
  20. %***  physorg  ***
  21.  
  22. %***  physmain  ***
  23.  
  24. %***  physfont  ***
  25.  
  26. %***  load am... or cm... fonts according to PLAIN's selection  ***
  27.  
  28. %\font\sevensl=\font@sel sl7  %not included in physe (check for TFM first)
  29.  
  30. %***  sizes  ***
  31.  
  32. \def\modtwelvepoint{\modtwelve@point
  33.   \let\normal@spacing\twelve@spacing \set@spacing
  34.   \let\big=\modtwelvebig   \let\Big=\modtwelveBig
  35.   \let\bigg=\modtwelvebigg \let\Bigg=\modtwelveBigg}
  36. \def\modtwelvebig#1{{\hbox{$\left#1\vbox to9.5\p@{}\right.\n@space$}}}
  37. \def\modtwelveBig#1{{\hbox{$\left#1\vbox to12.5\p@{}\right.\n@space$}}}
  38. \def\modtwelvebigg#1{{\hbox{$\left#1\vbox to15.5\p@{}\right.\n@space$}}}
  39. \def\modtwelveBigg#1{{\hbox{$\left#1\vbox to18.5\p@{}\right.\n@space$}}}
  40.  
  41. %***  fonts for sizes  ***
  42.  
  43. \def\modtwelve@point{\set@fonts twelve nine eight }  %let 8 ->7 if tfm's avail.
  44.  
  45. %***  macros for sizes  ***
  46.  
  47. \def\modlarge{\par \bgroup \modtwelvepoint \after@arg\@size}
  48. \def\MODLARGE#1{{\modtwelve@point #1}}
  49.  
  50. %***  phystext  ***
  51.  
  52. %***  physpage  ***
  53.  
  54. %***  physchap  ***
  55.  
  56. %***  physequ  ***
  57.  
  58. %***  physstor  ***
  59.  
  60. %***  physfig  ***
  61.  
  62. %***  physpict  ***
  63.  
  64. %***  ProPLOT macros  ***
  65.  
  66. \outer\def\ProPLOTfigs{\glet\ProPLOTpfig\pr@pfig \glet\ProPLOTlfig\pr@lfig}
  67. \outer\def\noProPLOTfigs{\glet\ProPLOTpfig\nopr@fig \glet\ProPLOTlfig\nopr@fig}
  68.  
  69. \def\pr@pfig#1#2#3#4{\hbox\bgroup \setbox\z@\hbox{\special{ps: plotfile #1}}
  70.    \dimen\z@=#3 \advance\dimen\z@ by #4 \wd\z@=#2 \ht\z@=\dimen\z@ \dp\z@=\z@
  71.    \lower#4\box\z@ \egroup}
  72. \def\pr@lfig#1#2#3#4{\hbox\bgroup \setbox\z@\null
  73.    \dimen\z@=#3 \advance\dimen\z@ by #4 \wd\z@=#2 \ht\z@=#3 \dp\z@=#4 \box\z@
  74.    \wd\z@=\z@ \setbox\z@\hbox{\special{ps: plotfile #1}} \lower#4\box\z@ \egroup}
  75. %\def\pr@fig#1#2#3#4{\hbox\bgroup \setbox\z@\hbox{\special{ps: plotfile #1}}%
  76. %  \lower#4\copy\z@ \hskip#2\raise#3\box\z@ \egroup}
  77. \def\nopr@fig#1#2#3#4{\hbox\bgroup \write\m@ne{Insert ProPLOT Output File: #1}%
  78.   \frame{#2}{#3}{#4}\egroup}
  79.  
  80. \ProPLOTfigs %set the default
  81.  
  82. %***  phystab  ***
  83.  
  84. %***  phystabl  ***
  85.  
  86. %***  physref  ***
  87.  
  88. %***  physjrnl  ***
  89.  
  90. %***  phystoc  ***
  91.  
  92. %***  physfoot  ***
  93.  
  94. %***  physitem  ***
  95.  
  96. %***  physmath  ***
  97.  
  98. %***  physsave  ***
  99.  
  100. \def\save@type{.sav }  % file type for save and restore
  101.                        % modified from .texsave to .sav for PC use
  102. %***  physinst  ***
  103.  
  104. %***  physorg (options which must be set after defining macros)  ***
  105.  
  106.  
  107. \def\wlog{\immediate\write\m@ne} % restore PLAIN's definition
  108. \catcode`\@=12 % @ signs are no longer letters
  109. %***  end of file PHYSUPDT  ***
  110.